Top 10k strings from Games Tape 2 - Poker Dice (1982)(Gilsoft International)(16k).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Compilations - Utilities & Educational & Various / Sinclair ZX Spectrum - Compilations - Various - [TZX] (TOSEC-v2006-06-06) /

Back to the directory listing

   1 win=(bet*(hand<5
   1 udg+z,value:
   1 poker dice
   1 money=money-bet:
   1 money=money+win
   1 h(z),h$(z):
   1 goes=goes+1
   1 a,c,c,a,a,c,c,1
   1 TZXed by Graeme Yeandle
   1 Gilsoft International
   1 Games Tape 2
   1 ;'" ACE KING QUEEN JACK NINE  TEN  "
   1 ;"Setting up UDG's"
   1 ;"ROLLROLLROLLROLLROLL":
   1 ;"Press any key for instructions"
   1 ;"POKER DICE";
   1 ;" two lots of pairs."
   1 ;" three of one rank   and two of another."
   1 ;" three faces the same"
   1 ;" is not legal.All hands may be in any order."
   1 ;" four faces the same."
   1 ;" five faces the same."
   1 ;" any 5 sequential    cards. eg A K Q J 10."
   1 ;" Win   `      ";
   1 ;" Score ";
   1 ;" POKER HANDS "'
   1 ;" Money `     ";
   1 ;" GILSOFT  Spectrum POKER DICE "
   1 ;" Bet   `      ";
   1 ;"  Press any key to play game    "
   1 ;"  Press any key to continue    "
   1 ;"   Roll no ";g;"   "
   1 ;"      ";
   1 ;"           Press any key        "
   1 ;"           ":
   1 ;"           "
   1 ;"               "
   1 5 of a kind4 of a kindFull house Straight   3 of a kind2 pairs    1 pair                
   1 -hand))-bet*(hand=7
   1 ,dice;d$(face,2
   1 ,dice;d$(face,1
   1 ,d(d))=c(1
   1 ,c,c,a,a,c,c,a,d,b,b,a,a,b,b,a
   1 ,c,c,a,a,b,b,d,d,b,b,a
   1 ,a,b,b,a,a,b,b,d,1
   1 ,"Straight",102
   1 ,"Full house",5
   1 ,"5 of a kind",1001
   1 ,"4 of a kind",110
   1 ,"3 of a kind",21
   1 ,"2 pairs",13
   1 *r(dice);("ROLL"
   1 *bet*(hand=0
   1 (money/goes*100
   1 '" Select dice numbers & press R   [ or to finish turn press Q ]  "
   1 '" Any type of ";
   1 '" 'Poker Dice' is based on the   famous game POKER.  The idea is to form as strong a possible    POKER hand on the throw of five dice.  Each dice has six faces;"
   1 '"  You may bet any amount from   10p to all your money.  You are then given three dice rolls."
   1 '"  Select the dice to roll using keys 1 to 5 (press again to     cancel).  Then press 'R'. If youhave a good hand already push Q."
   1 #   Poker Dice Game   #
   1 "Poker Dice (Games Tape 2 - Side 2)
   1 "Bet (0 to end) :";bet:
   1 " "+h$(k)+" "
   1 "  The possible poker hands are  as follows. "
   1  T.Gilberts 1982 ##